-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy path9.3 Piecewise linear functions.nb
More file actions
7056 lines (6881 loc) · 337 KB
/
9.3 Piecewise linear functions.nb
File metadata and controls
7056 lines (6881 loc) · 337 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
(* Content-type: application/mathematica *)
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
(* CreatedBy='Mathematica 7.0' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 145, 7]
NotebookDataLength[ 337516, 7047]
NotebookOptionsPosition[ 328255, 6802]
NotebookOutlinePosition[ 329849, 6854]
CellTagsIndexPosition[ 329806, 6851]
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[Cell[TextData[StyleBox["Rules for integrands involving piecewise \
linear functions",
FontFamily->"Arial"]], "None"]], "Subsubtitle",
CellDingbat->None,
CellChangeTimes->{
3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9,
3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9,
3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9},
3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9},
3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9,
3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9,
3.496441349830719*^9}, 3.4964414848609076`*^9, 3.496521708137803*^9, {
3.4965218981240697`*^9, 3.49652189838407*^9}, 3.4965229070755*^9,
3.4965234353062396`*^9, {3.5193214825316973`*^9, 3.5193214852617016`*^9}, {
3.523316399894187*^9, 3.5233164032341914`*^9}, {3.523318350558202*^9,
3.5233183516382036`*^9}, {3.536542725780803*^9, 3.536542725780803*^9}, {
3.5367764878952584`*^9, 3.5367764886452594`*^9}, {3.544322815209103*^9,
3.5443228192963104`*^9}, {3.5450662624913826`*^9, 3.545066292141424*^9}, {
3.545066402271579*^9, 3.5450664054415827`*^9}, {3.5450834884295015`*^9,
3.5450834895895033`*^9}, {3.5454961263762493`*^9,
3.5454961321462574`*^9}, {3.5454963863166127`*^9,
3.5454964580867133`*^9}, {3.545497046127537*^9, 3.545497046127537*^9}, {
3.5454971130676303`*^9, 3.545497136257663*^9}, 3.545610399977621*^9, {
3.546040778592962*^9, 3.546040778592962*^9}, {3.5461052065706367`*^9,
3.5461052249474688`*^9}, {3.546191339879622*^9, 3.5461913430596266`*^9}, {
3.5462141824067917`*^9, 3.5462142145768366`*^9}, {3.5462145455473003`*^9,
3.5462145601073203`*^9}, {3.5463149785974817`*^9,
3.5463149794195285`*^9}, {3.5488738437683954`*^9,
3.5488738699084315`*^9}, {3.5488890647645535`*^9, 3.548889080804576*^9}, {
3.5505951583099127`*^9, 3.5505951620351257`*^9}, {3.5505952613798075`*^9,
3.5505952630869055`*^9}, {3.5535321133435373`*^9,
3.5535321173537664`*^9}, {3.5536175341411576`*^9,
3.5536175352411594`*^9}, {3.55396599671187*^9, 3.55396599862998*^9}, {
3.559537546274218*^9, 3.5595375537746468`*^9}, {3.559593463450899*^9,
3.559593474371523*^9}, {3.559679574563182*^9, 3.559679595188362*^9}, {
3.5596838349128604`*^9, 3.5596838361819324`*^9}, {3.5761238496568203`*^9,
3.5761238638668404`*^9}},
TextAlignment->Center,
FontWeight->"Bold"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{Cell[TextData[StyleBox["1:",
FontFamily->"Arial",
FontColor->RGBColor[1, 0, 0]]], "None"], " ",
RowBox[{"\[Integral]",
RowBox[{
SuperscriptBox["u", "m"],
RowBox[{"\[DifferentialD]", "x"}], " ",
StyleBox["when",
FontFamily->"Arial",
FontWeight->"Plain"],
StyleBox[" ",
FontFamily->"Arial",
FontWeight->"Plain"], Cell[TextData[Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["\[PartialD]", "x"], "u"}], "\[Equal]", "c"}]]]],
"None"]}]}]}]], "Subsubtitle",
CellDingbat->None,
CellChangeTimes->{
3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9,
3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9,
3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9},
3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9},
3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9,
3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9,
3.496441349830719*^9}, 3.4964414848609076`*^9, 3.496521708137803*^9, {
3.4965218981240697`*^9, 3.49652189838407*^9}, 3.4965229070755*^9,
3.519247079685614*^9, {3.5193208582062006`*^9, 3.5193208612170057`*^9},
3.5193325694253187`*^9, {3.5193422443984776`*^9, 3.5193422447260776`*^9},
3.5193424488212357`*^9, {3.5193434708254333`*^9, 3.519343473103037*^9}, {
3.5193435097631016`*^9, 3.51934353169674*^9}, {3.519345739319023*^9,
3.519345739599823*^9}, 3.5193462601259375`*^9, {3.5193475061060295`*^9,
3.5193475233908596`*^9}, {3.519351391880224*^9, 3.5193513931402254`*^9}, {
3.519403773021052*^9, 3.5194037798564425`*^9}, 3.5194106793250647`*^9, {
3.519537578341393*^9, 3.5195375792305946`*^9}, {3.5195376277778797`*^9,
3.51953767927357*^9}, {3.5197586260636144`*^9, 3.5197586260636144`*^9}, {
3.51978053295651*^9, 3.519780542862528*^9}, {3.5197806526087203`*^9,
3.5197806657595434`*^9}, {3.5197807490168896`*^9, 3.5197807642581167`*^9},
3.5197809004619555`*^9, {3.519782653514635*^9, 3.5197826623286505`*^9}, {
3.5200207810164795`*^9, 3.520020785046485*^9}, {3.5213126833374643`*^9,
3.5213126833374643`*^9}, {3.521328235411002*^9, 3.521328235411002*^9}, {
3.523315567893022*^9, 3.523315567893022*^9}, {3.5233157569332867`*^9,
3.5233157613032923`*^9}, {3.5323023198133526`*^9, 3.532302355723403*^9}, {
3.5323026417638035`*^9, 3.5323026417638035`*^9}, {3.5323026980138817`*^9,
3.5323026980138817`*^9}, {3.532636287104328*^9, 3.532636287104328*^9}, {
3.5330803686035347`*^9, 3.533080368863535*^9}, {3.533248909289961*^9,
3.5332489110299635`*^9}, {3.534962469565694*^9, 3.5349624910757236`*^9}, {
3.5349625224057674`*^9, 3.534962522655768*^9}, {3.534965265519608*^9,
3.534965265519608*^9}, {3.5349668288168063`*^9, 3.5349668292668066`*^9}, {
3.5349747358481646`*^9, 3.5349747358481646`*^9}, {3.534975457949176*^9,
3.534975457949176*^9}, {3.5368633963532934`*^9, 3.536863396571694*^9}, {
3.541644322511304*^9, 3.5416443577513533`*^9}, {3.5416458269234104`*^9,
3.541645839633428*^9}, {3.5416460312236967`*^9, 3.541646031483697*^9},
3.541646227783972*^9, {3.541647080335165*^9, 3.5416471077052035`*^9}, {
3.541648997607849*^9, 3.5416489978278494`*^9}, 3.541649088407976*^9, {
3.5417848711596775`*^9, 3.541784902429721*^9}, {3.541786145331461*^9,
3.5417861455914617`*^9}, {3.5417870037166634`*^9, 3.5417870039366636`*^9},
3.5462979620242105`*^9, {3.546298264094633*^9, 3.546298265344635*^9}, {
3.546299000235664*^9, 3.546299001505666*^9}, {3.546315119909564*^9,
3.5463151267659564`*^9}, {3.547227356319705*^9, 3.547227356319705*^9},
3.547918559331044*^9, {3.547918610170952*^9, 3.5479186304411116`*^9},
3.548537755517557*^9, 3.5485441629685287`*^9, 3.5485517520154133`*^9, {
3.5488740727887154`*^9, 3.5488740727887154`*^9}, {3.548874206618903*^9,
3.548874206808903*^9}, 3.548877100795455*^9, 3.550596464087599*^9, {
3.5505965767870445`*^9, 3.5505965767870445`*^9}, 3.5505966202465305`*^9, {
3.5506039138305197`*^9, 3.55060391400453*^9}, {3.5506040039986773`*^9,
3.550604005776779*^9}, {3.5506178888272758`*^9, 3.5506178900273447`*^9}, {
3.550770598144562*^9, 3.550770659629079*^9}, {3.5507707252908344`*^9,
3.5507707474461017`*^9}, 3.5507880023630266`*^9, {3.5508017696214375`*^9,
3.5508017788269644`*^9}, {3.5508018116158395`*^9, 3.5508018116158395`*^9},
3.5508018976437597`*^9, {3.5508021384015307`*^9, 3.550802155115487*^9}, {
3.5508022151019173`*^9, 3.5508022151019173`*^9}, {3.550802487106476*^9,
3.5508025179152374`*^9}, {3.5508029261175857`*^9,
3.5508029342300496`*^9}, {3.5521511708590136`*^9, 3.5521511712334137`*^9},
3.552151666269083*^9, {3.5535324250863676`*^9, 3.553532441643315*^9}, {
3.553532476791325*^9, 3.553532477502366*^9}, {3.5535325810722895`*^9,
3.5535325810722895`*^9}, {3.553534924419321*^9, 3.5535349316017323`*^9}, {
3.5535597570381007`*^9, 3.553559765608113*^9}, {3.553559900728302*^9,
3.55355990606831*^9}, 3.553560247968788*^9, {3.553560284118839*^9,
3.553560284268839*^9}, 3.553617750921461*^9, {3.5536177847415085`*^9,
3.553617790541517*^9}, 3.553618024341844*^9, 3.55396602222933*^9, {
3.5557245433748407`*^9, 3.5557245433748407`*^9}, {3.555724591514908*^9,
3.55572459285491*^9}, 3.555812607377571*^9, {3.5559627484519744`*^9,
3.555962760331991*^9}, {3.558897368802059*^9, 3.5588973840420804`*^9},
3.558906841384453*^9, {3.5589119084815474`*^9, 3.5589119574616156`*^9}, {
3.558912370822194*^9, 3.5589123709621944`*^9}, 3.5590664840800095`*^9, {
3.5590665890008783`*^9, 3.5590666073072014`*^9}, {3.5590852197498875`*^9,
3.559085264328438*^9}, 3.5590854642548723`*^9, {3.559085723861721*^9,
3.559085723861721*^9}, {3.5590862853648376`*^9, 3.559086310641283*^9},
3.5591548156862626`*^9, {3.5591548699553666`*^9, 3.559154870589403*^9}, {
3.5591549061984396`*^9, 3.5591549317539015`*^9}, {3.5591565788251085`*^9,
3.5591565809932327`*^9}, 3.5591586582090425`*^9, {3.5591588362512255`*^9,
3.5591588362512255`*^9}, 3.559159102647463*^9, {3.5591674525881643`*^9,
3.559167469131111*^9}, 3.55932221077491*^9, {3.5595376651350164`*^9,
3.5595376683452*^9}, 3.5595379345404253`*^9, 3.5595831096448965`*^9, {
3.5595831572586203`*^9, 3.5595831572586203`*^9}, {3.559583213470835*^9,
3.559583213935862*^9}, 3.5595844180577335`*^9, 3.5595934078157167`*^9, {
3.5596701184955263`*^9, 3.559670132690338*^9}, 3.559768367298964*^9},
FontSize->12,
FontWeight->"Bold"],
Cell["Derivation: Integration by substitution", "Subsubsection",
CellChangeTimes->{{3.5591674837779484`*^9, 3.559167486638112*^9}}],
Cell[TextData[{
"Basis",
": If ",
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["\[PartialD]", "x"], "u"}], "\[Equal]", "c"}]], "Input",
CellChangeTimes->{{3.5589077117756715`*^9, 3.558907715995678*^9}}],
", then",
" ",
Cell[BoxData[
RowBox[{
SuperscriptBox["u", "m"], "\[Equal]",
RowBox[{
FractionBox["1", "c"],
SuperscriptBox["u", "m"],
RowBox[{
SubscriptBox["\[PartialD]", "x"], "u"}]}]}]], "Input",
CellChangeTimes->{{3.5589077117756715`*^9, 3.558907715995678*^9}}]
}], "Subsubsection",
CellDingbat->"\[FilledSmallSquare]",
CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9,
3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9,
3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9,
3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9,
3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9},
3.48070534977779*^9, {3.4928296953212276`*^9, 3.492829707041244*^9}, {
3.5557245453948436`*^9, 3.5557245453948436`*^9}, 3.5588982369432745`*^9, {
3.5589076316855593`*^9, 3.5589076347755637`*^9}, {3.558907724145689*^9,
3.5589077251656904`*^9}, 3.5589120967818108`*^9, {3.5589121268118525`*^9,
3.5589121268118525`*^9}, {3.558913202213358*^9, 3.558913202213358*^9}, {
3.5590855171899004`*^9, 3.559085522203187*^9}, {3.559085567209761*^9,
3.5590855746791887`*^9}, {3.5590863423610973`*^9, 3.559086347529393*^9}, {
3.5591535854688983`*^9, 3.5591535888020887`*^9}, {3.55915690492176*^9,
3.55915690492176*^9}, {3.559156959572886*^9, 3.559156959572886*^9}, {
3.559167615185465*^9, 3.559167615185465*^9}, {3.5595379858973627`*^9,
3.5595379865333996`*^9}, {3.5595380200123143`*^9,
3.5595380440306883`*^9}, {3.5595382353736324`*^9, 3.559538252001583*^9}, {
3.559583109668898*^9, 3.559583109678899*^9}, {3.5595831572686205`*^9,
3.5595831572686205`*^9}, {3.5596701490142717`*^9,
3.5596702161081095`*^9}, {3.5597683768155084`*^9, 3.5597683781065826`*^9}}],
Cell[TextData[{
"Rule: If ",
Cell[BoxData[
RowBox[{
RowBox[{
SubscriptBox["\[PartialD]", "x"], "u"}], "\[Equal]", "c"}]], "Input",
CellChangeTimes->{{3.5589077117756715`*^9, 3.558907715995678*^9}}],
", then"
}], "Subsubsection",
CellDingbat->"\[FilledSmallSquare]",
CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9,
3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9,
3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9,
3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9,
3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9},
3.48070534977779*^9, {3.4928296953212276`*^9, 3.492829707041244*^9}, {
3.5557245453948436`*^9, 3.5557245453948436`*^9}, 3.5588982369432745`*^9, {
3.558911977821644*^9, 3.558911995561669*^9}, {3.559066802798304*^9,
3.559066802798304*^9}, {3.5590855981475306`*^9, 3.559085605814969*^9}, {
3.559086374093912*^9, 3.559086374093912*^9}, {3.5591550126695294`*^9,
3.5591550126705294`*^9}, {3.559156591839853*^9, 3.559156591839853*^9}, {
3.5591588444326935`*^9, 3.5591588444326935`*^9}, 3.55916762349994*^9, {
3.5595379513783884`*^9, 3.5595379717085514`*^9}, {3.559583157274621*^9,
3.559583157274621*^9}, {3.559670235906242*^9, 3.559670235906242*^9}}],
Cell[BoxData[
RowBox[{"\[Integral]",
RowBox[{
SuperscriptBox["u", "m"],
RowBox[{"\[DifferentialD]",
RowBox[{"x", " ", "\[LongRightArrow]", " ",
FractionBox["1", "c"]}]}],
RowBox[{"Subst", "[",
RowBox[{
RowBox[{"\[Integral]",
RowBox[{
SuperscriptBox["x", "m"],
RowBox[{"\[DifferentialD]", "x"}]}]}], ",", "x", ",", "u"}],
"]"}]}]}]], "Subsubtitle",
CellDingbat->None,
CellChangeTimes->{{3.4796579732027807`*^9, 3.479658002474872*^9}, {
3.4796580599975853`*^9, 3.4796580609489536`*^9}, {3.479658295195784*^9,
3.47965829684816*^9}, 3.4796611938939075`*^9, 3.4796613924794593`*^9, {
3.479661443342597*^9, 3.479661446647349*^9}, {3.479661576554146*^9,
3.479661589302477*^9}, 3.479661847553824*^9, {3.4796622294729967`*^9,
3.4796622450654173`*^9}, {3.479686720424531*^9, 3.4796867204345455`*^9}, {
3.4796874646646957`*^9, 3.4796874745589232`*^9}, {3.492826573513727*^9,
3.492826578630536*^9}, {3.4928267070863624`*^9, 3.492826707460763*^9},
3.4928267903497095`*^9, {3.492829799151373*^9, 3.4928299617216005`*^9}, {
3.4940972077187414`*^9, 3.4940972347887793`*^9}, {3.49409966398218*^9,
3.494099664952181*^9}, {3.4940997156722527`*^9, 3.494099716112253*^9}, {
3.5539660222373304`*^9, 3.5539660222523313`*^9}, 3.5539664390341697`*^9, {
3.5588973945920954`*^9, 3.5588974214321327`*^9}, {3.558906842404454*^9,
3.5589068433344555`*^9}, {3.5589069956746693`*^9,
3.5589070003646755`*^9}, {3.5589121511618867`*^9, 3.558912179861927*^9}, {
3.5590666950033026`*^9, 3.559066753908003*^9}, {3.5590852550559072`*^9,
3.5590853055297937`*^9}, {3.5590854073206162`*^9, 3.5590854254546537`*^9},
3.559085481331849*^9, 3.5590861444137754`*^9, {3.559154948274846*^9,
3.559155002274935*^9}, {3.5591565928509107`*^9, 3.559156594155985*^9}, {
3.5591586680166035`*^9, 3.5591586726508684`*^9}, {3.559158786347371*^9,
3.559158793576785*^9}, {3.5591674753814683`*^9, 3.5591674757534895`*^9}, {
3.5591676484013643`*^9, 3.5591676960940924`*^9}, {3.559538091604409*^9,
3.5595381008469377`*^9}, {3.5595831096938996`*^9, 3.5595831096979*^9}, {
3.5596702427486334`*^9, 3.559670253019221*^9}, {3.559768389012206*^9,
3.5597683904522886`*^9}},
TextAlignment->Center,
FontSize->12,
FontWeight->"Bold"],
Cell["Program code:", "Subsubsection",
CellDingbat->"\[FilledSmallSquare]",
CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9,
3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9,
3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9,
3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9,
3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9},
3.4807050675119123`*^9, {3.492804314166378*^9, 3.4928043441496305`*^9}, {
3.4928044532166224`*^9, 3.492804453513023*^9}, {3.492805162266266*^9,
3.492805165713872*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"Int", "[",
RowBox[{
RowBox[{"u_", "^", "m_."}], ",", "x_Symbol"}], "]"}], " ", ":=", "\n",
" ",
RowBox[{
RowBox[{"With", "[",
RowBox[{
RowBox[{"{",
RowBox[{"c", "=",
RowBox[{"Simplify", "[",
RowBox[{"D", "[",
RowBox[{"u", ",", "x"}], "]"}], "]"}]}], "}"}], ",", "\n", " ",
RowBox[{
RowBox[{"1", "/", "c"}], "*",
RowBox[{"Subst", "[",
RowBox[{
RowBox[{"Int", "[",
RowBox[{
RowBox[{"x", "^", "m"}], ",", "x"}], "]"}], ",", "x", ",", "u"}],
"]"}]}]}], "]"}], " ", "/;", "\n",
RowBox[{
RowBox[{"FreeQ", "[",
RowBox[{"m", ",", "x"}], "]"}], " ", "&&", " ",
RowBox[{"PiecewiseLinearQ", "[",
RowBox[{"u", ",", "x"}], "]"}]}]}]}]], "Code",
CellChangeTimes->{{3.494097279728842*^9, 3.494097309778884*^9}, {
3.5539664778523903`*^9, 3.5539664830786886`*^9}, 3.5557242440544214`*^9,
3.5557245691448765`*^9, {3.5588975344522905`*^9, 3.5588975719523435`*^9},
3.558897610022397*^9, {3.5589068446644573`*^9, 3.5589068470444613`*^9}, {
3.5589070612347608`*^9, 3.5589070759847813`*^9}, {3.5589120572417555`*^9,
3.5589120606317596`*^9}, {3.5589121924819446`*^9, 3.558912222691987*^9}, {
3.559065229165531*^9, 3.5590652495748787`*^9}, {3.5590652998171234`*^9,
3.5590653428089423`*^9}, {3.5590859371329193`*^9,
3.5590860358745675`*^9}, {3.5590861224855213`*^9, 3.559086151274168*^9}, {
3.559086192678536*^9, 3.559086194543643*^9}, {3.559155057209077*^9,
3.5591551236998796`*^9}, {3.559156618773393*^9, 3.559156623676674*^9}, {
3.559158877734598*^9, 3.5591589386860847`*^9}, {3.5591589814645314`*^9,
3.559159003952818*^9}, {3.559167768452231*^9, 3.5591678235553827`*^9}, {
3.5591679332946596`*^9, 3.5591679342247124`*^9}, {3.559182802889404*^9,
3.5591828033504305`*^9}, {3.559538107736332*^9, 3.5595381876549025`*^9},
3.5595831572846217`*^9, 3.559583395077223*^9, {3.559583441280865*^9,
3.559583464776209*^9}, {3.559583535703266*^9, 3.559583598262844*^9}, {
3.559670265653943*^9, 3.5596703155097947`*^9}, {3.559670393031229*^9,
3.5596703964254227`*^9}, {3.5596799630754037`*^9, 3.559679994575206*^9},
3.55968761099984*^9, {3.559768394923544*^9, 3.5597684001258416`*^9},
3.715475583281397*^9},
Background->GrayLevel[0.85]],
Cell["", "Subsubsection",
CellDingbat->None,
CellChangeTimes->{3.4796643211106243`*^9, 3.4941724567488375`*^9}]
}, Closed]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{Cell[TextData[StyleBox["2:",
FontFamily->"Arial"]], "None"], " ",
RowBox[{"\[Integral]",
RowBox[{
SuperscriptBox["u", "m"], " ",
SuperscriptBox["v", "n"],
RowBox[{"\[DifferentialD]", "x"}], " ",
StyleBox["when",
FontFamily->"Arial",
FontWeight->"Plain"],
StyleBox[
RowBox[{
StyleBox[" ",
FontFamily->"Arial",
FontWeight->"Plain"], " "}]], Cell[TextData[Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
SubscriptBox["\[PartialD]", "x"], "u"}], "\[Equal]", "a"}], " ",
"\[And]", " ",
RowBox[{
RowBox[{
SubscriptBox["\[PartialD]", "x"], "v"}], "\[Equal]", "b"}], " ",
"\[And]", " ",
RowBox[{
RowBox[{
RowBox[{"b", " ", "u"}], "-",
RowBox[{"a", " ", "v"}]}], "\[NotEqual]", "0"}]}]]]],
"None"]}]}]}]], "Subsubtitle",
CellDingbat->None,
CellChangeTimes->{
3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9,
3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9,
3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9},
3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9},
3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9,
3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9,
3.496441349830719*^9}, 3.4964414848609076`*^9, 3.496521708137803*^9, {
3.4965218981240697`*^9, 3.49652189838407*^9}, 3.4965229070755*^9,
3.4965234353062396`*^9, {3.5193214825316973`*^9, 3.5193214852617016`*^9}, {
3.523316399894187*^9, 3.5233164032341914`*^9}, {3.523318350558202*^9,
3.5233183516382036`*^9}, {3.523920541310981*^9, 3.5239205678622274`*^9}, {
3.523920691428844*^9, 3.5239206937844477`*^9}, {3.5239214071837006`*^9,
3.5239214138605127`*^9}, {3.5365425710705867`*^9,
3.5365425710705867`*^9}, {3.5367763778751044`*^9, 3.5367763807151084`*^9},
3.5393935872963257`*^9, {3.5422577123728857`*^9, 3.5422577123884854`*^9}, {
3.544373204975227*^9, 3.544373209805234*^9}, {3.5597602982524414`*^9,
3.5597603113671913`*^9}, {3.5597622888582973`*^9,
3.5597622888582973`*^9}, {3.559768327763703*^9, 3.5597683387663317`*^9}},
FontSize->12,
FontWeight->"Bold"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"\t",
RowBox[{Cell[TextData[StyleBox["1.",
FontFamily->"Arial"]], "None"], " ",
RowBox[{"\[Integral]",
RowBox[{
FractionBox[
SuperscriptBox["v", "n"], "u"],
RowBox[{"\[DifferentialD]", "x"}], " ",
StyleBox["when",
FontFamily->"Arial",
FontWeight->"Plain"],
StyleBox[
RowBox[{
StyleBox[" ",
FontFamily->"Arial",
FontWeight->"Plain"], " "}]], Cell[TextData[Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
SubscriptBox["\[PartialD]", "x"], "u"}], "\[Equal]", "a"}], " ",
"\[And]", " ",
RowBox[{
RowBox[{
SubscriptBox["\[PartialD]", "x"], "v"}], "\[Equal]", "b"}], " ",
"\[And]", " ",
RowBox[{
RowBox[{
RowBox[{"b", " ", "u"}], "-",
RowBox[{"a", " ", "v"}]}], "\[NotEqual]", "0"}]}]]]],
"None"]}]}]}]}]], "Subsubtitle",
CellDingbat->None,
CellChangeTimes->{
3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9,
3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9,
3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9},
3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9},
3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9,
3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9,
3.496441349830719*^9}, 3.4964414848609076`*^9, 3.4964645213514385`*^9,
3.5192470594155855`*^9, {3.519247288125906*^9, 3.5192473207459517`*^9}, {
3.519250976620308*^9, 3.5192509795375133`*^9}, {3.5192520188581386`*^9,
3.519252047359389*^9}, {3.5193215842126756`*^9, 3.519321601263506*^9}, {
3.5194119314592657`*^9, 3.519411931802466*^9}, {3.5197938910231733`*^9,
3.519793891225974*^9}, {3.521473802252653*^9, 3.5214738265526876`*^9}, {
3.521474098923069*^9, 3.5214741010730715`*^9}, {3.5233165069443364`*^9,
3.5233165069443364`*^9}, {3.523316543544388*^9, 3.523316543544388*^9}, {
3.523318428619928*^9, 3.523318428859928*^9}, {3.5239323924621134`*^9,
3.5239324122429485`*^9}, 3.5239326458689585`*^9, {3.523933493309247*^9,
3.523933514852885*^9}, {3.524106196773529*^9, 3.5241061969451294`*^9}, {
3.524276131468882*^9, 3.524276131796483*^9}, {3.5244283128175106`*^9,
3.5244283128175106`*^9}, {3.5305002027039576`*^9,
3.5305002032839584`*^9}, {3.531336527427523*^9, 3.531336528218661*^9}, {
3.5393936363055983`*^9, 3.539393636495601*^9}, 3.5597602983814487`*^9,
3.5597603725326896`*^9, {3.5597622900843673`*^9, 3.5597622900843673`*^9}, {
3.5597875680894713`*^9, 3.5597875693695445`*^9}, {3.5597875994392643`*^9,
3.5597876044205494`*^9}},
FontSize->12,
FontWeight->"Bold"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"\t\t",
RowBox[{Cell[TextData[StyleBox["1.",
FontFamily->"Arial"]], "None"], " ",
RowBox[{"\[Integral]",
RowBox[{
FractionBox[
SuperscriptBox["v", "n"], "u"],
RowBox[{"\[DifferentialD]", "x"}], " ",
StyleBox["when",
FontFamily->"Arial",
FontWeight->"Plain"],
StyleBox[
RowBox[{
StyleBox[" ",
FontFamily->"Arial",
FontWeight->"Plain"], " "}]], Cell[TextData[Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
SubscriptBox["\[PartialD]", "x"], "u"}], "\[Equal]", "a"}], " ",
"\[And]", " ",
RowBox[{
RowBox[{
SubscriptBox["\[PartialD]", "x"], "v"}], "\[Equal]", "b"}], " ",
"\[And]", " ",
RowBox[{
RowBox[{
RowBox[{"b", " ", "u"}], "-",
RowBox[{"a", " ", "v"}]}], "\[NotEqual]", "0"}], " ", "\[And]", " ",
RowBox[{"n", ">", "0"}]}]]]], "None"]}]}]}]}]], "Subsubtitle",
CellDingbat->None,
CellChangeTimes->{
3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9,
3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9,
3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9},
3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9},
3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9,
3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9,
3.496441349830719*^9}, 3.4964414848609076`*^9, 3.4964645213514385`*^9,
3.5192470594155855`*^9, {3.519247288125906*^9, 3.5192473207459517`*^9}, {
3.519250976620308*^9, 3.5192509795375133`*^9}, {3.5192520188581386`*^9,
3.519252047359389*^9}, {3.5193215842126756`*^9, 3.519321601263506*^9}, {
3.5194119314592657`*^9, 3.519411931802466*^9}, {3.5197938910231733`*^9,
3.519793891225974*^9}, {3.521473802252653*^9, 3.5214738265526876`*^9}, {
3.521474098923069*^9, 3.5214741010730715`*^9}, {3.5233165069443364`*^9,
3.5233165069443364`*^9}, {3.523316543544388*^9, 3.523316543544388*^9}, {
3.523318428619928*^9, 3.523318428859928*^9}, {3.5239323924621134`*^9,
3.5239324122429485`*^9}, 3.5239326458689585`*^9, {3.523933493309247*^9,
3.523933514852885*^9}, {3.524106196773529*^9, 3.5241061969451294`*^9}, {
3.524276131468882*^9, 3.524276131796483*^9}, {3.5244283128175106`*^9,
3.5244283128175106`*^9}, {3.5305002027039576`*^9,
3.5305002032839584`*^9}, {3.531336527427523*^9, 3.531336528218661*^9}, {
3.5393936363055983`*^9, 3.539393636495601*^9}, 3.5597602983814487`*^9,
3.5597603725326896`*^9, {3.5597622900843673`*^9, 3.5597622900843673`*^9}, {
3.5597875680894713`*^9, 3.5597875693695445`*^9}, {3.5597875994392643`*^9,
3.559787663789945*^9}, {3.5597876948057194`*^9, 3.5597876948057194`*^9}, {
3.559861159425878*^9, 3.559861159647891*^9}, {3.559861533777894*^9,
3.559861533777894*^9}},
FontSize->12,
FontWeight->"Bold"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"\t\t\t",
RowBox[{Cell[TextData[StyleBox["1:",
FontFamily->"Arial",
FontColor->RGBColor[1, 0, 0]]], "None"], " ",
RowBox[{"\[Integral]",
RowBox[{
FractionBox["v", "u"],
RowBox[{"\[DifferentialD]", "x"}], " ",
StyleBox["when",
FontFamily->"Arial",
FontWeight->"Plain"],
StyleBox[" ",
FontFamily->"Arial",
FontWeight->"Plain"], Cell[TextData[Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
SubscriptBox["\[PartialD]", "x"], "u"}], "\[Equal]", "a"}], " ",
"\[And]", " ",
RowBox[{
RowBox[{
SubscriptBox["\[PartialD]", "x"], "v"}], "\[Equal]", "b"}], " ",
"\[And]", " ",
RowBox[{
RowBox[{
RowBox[{"b", " ", "u"}], "-",
RowBox[{"a", " ", "v"}]}], "\[NotEqual]", "0"}]}]]]],
"None"]}]}]}]}]], "Subsubtitle",
CellDingbat->None,
CellChangeTimes->{
3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9,
3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9,
3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9},
3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9},
3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9,
3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9,
3.496441349830719*^9}, 3.4964414848609076`*^9, 3.4964645213514385`*^9,
3.5192470594155855`*^9, {3.519247288125906*^9, 3.5192473207459517`*^9}, {
3.519247363296011*^9, 3.519247363796012*^9}, 3.519258420199427*^9,
3.5192584863895197`*^9, {3.519320760160028*^9, 3.519320767367241*^9},
3.5193299099191504`*^9, {3.5193300315093203`*^9, 3.519330031709321*^9}, {
3.5193323099968634`*^9, 3.5193324414114943`*^9}, {3.5193327317904043`*^9,
3.519332762148057*^9}, {3.519340455685931*^9, 3.519340463318947*^9},
3.519340635545749*^9, {3.5193422478304834`*^9, 3.519342248704085*^9}, {
3.519342492766513*^9, 3.519342493156514*^9}, {3.519345750301442*^9,
3.5193457505978427`*^9}, 3.519346263464343*^9, {3.519349307658399*^9,
3.519349310965605*^9}, {3.519352294781488*^9, 3.5193522950014887`*^9}, {
3.5194134359455075`*^9, 3.519413446054325*^9}, {3.5194134908888044`*^9,
3.5194134927764077`*^9}, {3.5194141847624226`*^9,
3.5194142323581066`*^9}, {3.519414342899901*^9, 3.519414474720132*^9}, {
3.5197939535480833`*^9, 3.5197939539380836`*^9}, {3.5197940297698174`*^9,
3.5197940299726176`*^9}, 3.519795153580191*^9, {3.5200103027397947`*^9,
3.5200103044997973`*^9}, {3.5232186878169007`*^9,
3.5232186881569014`*^9}, {3.5232193955778913`*^9,
3.5232193955778913`*^9}, {3.5233166487845354`*^9,
3.5233166487845354`*^9}, {3.5233167010346084`*^9,
3.5233167010346084`*^9}, {3.523318546315711*^9, 3.523318573368556*^9}, {
3.5239220709492664`*^9, 3.5239220924617043`*^9}, {3.5239221279205666`*^9,
3.5239221365629816`*^9}, {3.523930270899587*^9, 3.523930270899587*^9}, {
3.5240761703528385`*^9, 3.5240761703528385`*^9}, {3.52407843124921*^9,
3.5240784332304134`*^9}, {3.5240784932749186`*^9,
3.5240784932749186`*^9}, {3.524079230095413*^9, 3.524079246553442*^9}, {
3.5242761432469025`*^9, 3.524276143496503*^9}, {3.5242771518198743`*^9,
3.5242771521630745`*^9}, {3.53050021879398*^9, 3.5305002190639806`*^9}, {
3.5313467792889757`*^9, 3.531346779609437*^9}, {3.5332483759292145`*^9,
3.533248378049217*^9}, {3.5361011340389395`*^9, 3.5361011342609525`*^9}, {
3.5393936513939505`*^9, 3.539393651589962*^9}, {3.5597602987184677`*^9,
3.559760311575203*^9}, {3.5597622924045*^9, 3.5597622924055*^9}, {
3.5597663431011868`*^9, 3.5597663435022097`*^9}, {3.5597855003192015`*^9,
3.5597855007092237`*^9}, {3.55978775164997*^9, 3.559787835942792*^9}, {
3.559861161100974*^9, 3.559861162038028*^9}, {3.559866092364335*^9,
3.5598661034289684`*^9}},
FontSize->12,
FontWeight->"Bold"],
Cell[TextData[{
"Derivation: Piecewise linear recurrence 2 with ",
Cell[BoxData[
RowBox[{"m", "=",
RowBox[{"-", "1"}]}]]],
" and ",
Cell[BoxData[
RowBox[{"n", "=", "1"}]]]
}], "Subsubsection",
CellChangeTimes->{
3.496441803031353*^9, 3.4965396318089237`*^9, {3.4966002562016735`*^9,
3.4966002624716825`*^9}, 3.496600707442305*^9, 3.4966008475725017`*^9, {
3.4966070255131593`*^9, 3.496607032413169*^9}, 3.518279406700592*^9, {
3.51840552316576*^9, 3.5184055392257824`*^9}, 3.5184748983401833`*^9, {
3.5239219320466223`*^9, 3.523921932483423*^9}, 3.523922332636526*^9,
3.5240774276838474`*^9, 3.559762733210713*^9, {3.559787814676575*^9,
3.5597878234010744`*^9}, {3.5598661185198317`*^9, 3.5598661243191633`*^9}}],
Cell["Derivation: Inverted integration by parts", "Subsubsection",
CellChangeTimes->{
3.4964418130913677`*^9, {3.496442428087432*^9, 3.4964424330170403`*^9},
3.4964493315022907`*^9, 3.496451849815816*^9, 3.4964519519959593`*^9}],
Cell[TextData[{
"Rule: If ",
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
SubscriptBox["\[PartialD]", "x"], "u"}], "\[Equal]", "a"}], " ",
"\[And]", " ",
RowBox[{
RowBox[{
SubscriptBox["\[PartialD]", "x"], "v"}], "\[Equal]", "b"}], " ",
"\[And]", " ",
RowBox[{
RowBox[{
RowBox[{"b", " ", "u"}], "-",
RowBox[{"a", " ", "v"}]}], "\[NotEqual]", "0"}]}]]],
", then"
}], "Subsubsection",
CellDingbat->"\[FilledSmallSquare]",
CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9,
3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9,
3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9,
3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9,
3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9},
3.48070534977779*^9, {3.4928296953212276`*^9, 3.492829707041244*^9}, {
3.495391733731629*^9, 3.495391739521637*^9}, {3.4957339078770905`*^9,
3.495733966267172*^9}, {3.495734148157427*^9, 3.4957341584974413`*^9}, {
3.4957346698781567`*^9, 3.495734670108157*^9}, {3.4957347778783083`*^9,
3.4957348688784356`*^9}, {3.4957353058790474`*^9,
3.4957353764991465`*^9}, {3.495735447019245*^9, 3.4957354738692827`*^9}, {
3.495735673029561*^9, 3.495735708249611*^9}, {3.495735761689686*^9,
3.495735816759763*^9}, {3.519321952763323*^9, 3.5193219564137297`*^9}, {
3.5193301751295214`*^9, 3.5193301764895234`*^9}, {3.51997092534389*^9,
3.519970926503892*^9}, {3.519970958153936*^9, 3.5199709599639387`*^9}, {
3.5232193431478186`*^9, 3.5232193431478186`*^9}, {3.523219382187873*^9,
3.523219382187873*^9}, {3.5239242373346725`*^9, 3.5239242378182735`*^9}, {
3.52392508992297*^9, 3.52392509564818*^9}, {3.5239302376559286`*^9,
3.52393025562716*^9}, {3.5240761723340425`*^9, 3.5240761723340425`*^9}, {
3.5240785078765445`*^9, 3.5240785078765445`*^9}, {3.5240792759594936`*^9,
3.5240792759594936`*^9}, {3.533248403779253*^9, 3.533248403779253*^9},
3.5597622925715094`*^9, {3.5597878874817395`*^9, 3.5597878874817395`*^9}, {
3.5598661066861544`*^9, 3.5598661066861544`*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"\[Integral]",
RowBox[{
FractionBox["v", "u"],
RowBox[{"\[DifferentialD]",
RowBox[{"x", " ", "\[LongRightArrow]", " ",
FractionBox[
RowBox[{"b", " ", "x"}], "a"]}]}]}]}], "-",
RowBox[{
FractionBox[
RowBox[{
RowBox[{"b", " ", "u"}], "-",
RowBox[{"a", " ", "v"}]}], "a"],
RowBox[{"\[Integral]",
RowBox[{
FractionBox["1", "u"],
RowBox[{"\[DifferentialD]", "x"}]}]}]}]}]], "Subsubtitle",
CellDingbat->None,
CellChangeTimes->{{3.4796579732027807`*^9, 3.479658002474872*^9}, {
3.4796580599975853`*^9, 3.4796580609489536`*^9}, {3.479658295195784*^9,
3.47965829684816*^9}, 3.4796611938939075`*^9, 3.4796613924794593`*^9, {
3.479661443342597*^9, 3.479661446647349*^9}, {3.479661576554146*^9,
3.479661589302477*^9}, 3.479661847553824*^9, {3.4796622294729967`*^9,
3.4796622450654173`*^9}, {3.479686720424531*^9, 3.4796867204345455`*^9}, {
3.4796874646646957`*^9, 3.4796874745589232`*^9}, {3.492826573513727*^9,
3.492826578630536*^9}, {3.4928267070863624`*^9, 3.492826707460763*^9},
3.4928267903497095`*^9, {3.492829799151373*^9, 3.4928299617216005`*^9}, {
3.4940972077187414`*^9, 3.4940972347887793`*^9}, 3.495391718911608*^9,
3.495391753851657*^9, {3.495733875467045*^9, 3.4957338981670766`*^9},
3.4957347552282763`*^9, 3.4957352122989163`*^9, 3.495735613359478*^9, {
3.519245772243784*^9, 3.519245774883787*^9}, {3.523923312069047*^9,
3.5239233801163664`*^9}, 3.5239234676169205`*^9, {3.5597602987374687`*^9,
3.559760311604205*^9}, {3.5597665218974133`*^9, 3.559766543057624*^9}, {
3.5597738448792686`*^9, 3.559773846432358*^9}, {3.5597878439312487`*^9,
3.5597878771431484`*^9}, {3.5598612755627694`*^9,
3.5598612761748047`*^9}, {3.559866136606866*^9, 3.5598661727818794`*^9}, {
3.559866251168254*^9, 3.5598662542254286`*^9}},
TextAlignment->Center,
FontSize->12,
FontWeight->"Bold"],
Cell["Program code:", "Subsubsection",
CellDingbat->"\[FilledSmallSquare]",
CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9,
3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9,
3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9,
3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9,
3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9},
3.4807050675119123`*^9, {3.492804314166378*^9, 3.4928043441496305`*^9}, {
3.4928044532166224`*^9, 3.492804453513023*^9}, {3.492805162266266*^9,
3.492805165713872*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"Int", "[",
RowBox[{
RowBox[{"v_", "/", "u_"}], ",", "x_Symbol"}], "]"}], " ", ":=", "\n",
" ",
RowBox[{
RowBox[{"With", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"a", "=",
RowBox[{"Simplify", "[",
RowBox[{"D", "[",
RowBox[{"u", ",", "x"}], "]"}], "]"}]}], ",",
RowBox[{"b", "=",
RowBox[{"Simplify", "[",
RowBox[{"D", "[",
RowBox[{"v", ",", "x"}], "]"}], "]"}]}]}], "}"}], ",", "\n", " ",
RowBox[{
RowBox[{
RowBox[{"b", "*",
RowBox[{"x", "/", "a"}]}], " ", "-", " ",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"b", "*", "u"}], "-",
RowBox[{"a", "*", "v"}]}], ")"}], "/", "a"}], "*",
RowBox[{"Int", "[",
RowBox[{
RowBox[{"1", "/", "u"}], ",", "x"}], "]"}]}]}], " ", "/;", "\n",
" ",
RowBox[{"NeQ", "[",
RowBox[{
RowBox[{
RowBox[{"b", "*", "u"}], "-",
RowBox[{"a", "*", "v"}]}], ",", "0"}], "]"}]}]}], "]"}], " ", "/;",
"\n",
RowBox[{"PiecewiseLinearQ", "[",
RowBox[{"u", ",", "v", ",", "x"}], "]"}]}]}]], "Code",
CellChangeTimes->{{3.494097279728842*^9, 3.494097309778884*^9},
3.495391490771289*^9, 3.4957338140769587`*^9, {3.495734137617412*^9,
3.4957341399074154`*^9}, {3.495734511017935*^9, 3.495734528517959*^9},
3.4957347273482375`*^9, 3.495735153298834*^9, {3.495735298589037*^9,
3.4957353008290405`*^9}, 3.4957355751594243`*^9, {3.4957356510695305`*^9,
3.4957356533595343`*^9}, {3.495735877319847*^9, 3.495735880499852*^9}, {
3.5192457788337927`*^9, 3.519245781843797*^9}, {3.5195345973873577`*^9,
3.519534614016987*^9}, 3.519534727507186*^9, {3.519534795242505*^9,
3.5195348019193163`*^9}, 3.5195348785154514`*^9, {3.5195350295705166`*^9,
3.5195350491641507`*^9}, {3.519535092641427*^9, 3.5195351693935623`*^9}, {
3.519535655591216*^9, 3.5195356593664227`*^9}, {3.519606160650326*^9,
3.519606163090329*^9}, {3.519606452020734*^9, 3.519606460970746*^9}, {
3.519606533840848*^9, 3.5196065552708783`*^9}, {3.5196066384009943`*^9,
3.519606639350996*^9}, {3.519606960391445*^9, 3.519606964641451*^9}, {
3.519607006101509*^9, 3.519607008071512*^9}, {3.519690712415882*^9,
3.5196908122360215`*^9}, {3.5196913871068263`*^9, 3.519691398526842*^9}, {
3.5196915172970085`*^9, 3.5196915212270145`*^9}, {3.519691676937232*^9,
3.5196917072072744`*^9}, {3.519691741697323*^9, 3.519691769957362*^9}, {
3.519692141667883*^9, 3.519692177457933*^9}, 3.5196922088879766`*^9, {
3.519692290588091*^9, 3.5196923019281073`*^9}, {3.5196923355481544`*^9,
3.5196923578281856`*^9}, {3.5196923898282304`*^9, 3.519692393298235*^9}, {
3.519692695518658*^9, 3.5196926993486633`*^9}, {3.5196931055192323`*^9,
3.5196931104092393`*^9}, {3.519693151939297*^9, 3.5196931776293335`*^9}, {
3.5196932172193885`*^9, 3.519693234669413*^9}, {3.519753326771507*^9,
3.5197533305155134`*^9}, {3.5198313113547344`*^9, 3.519831340838786*^9}, {
3.519834362939569*^9, 3.51983439023713*^9}, {3.5198344273732543`*^9,
3.5198344481604433`*^9}, {3.5198350554380674`*^9,
3.5198350667580833`*^9}, {3.519972534776143*^9, 3.5199725378361473`*^9}, {
3.519976145341198*^9, 3.5199761527812085`*^9}, {3.5200079367719154`*^9,
3.520007944571929*^9}, {3.5200079838683977`*^9, 3.5200080068628387`*^9}, {
3.5200082042499847`*^9, 3.520008209163994*^9}, {3.520008268475298*^9,
3.520008272812105*^9}, {3.5200084631172194`*^9, 3.520008466417224*^9}, {
3.520008565427363*^9, 3.52000858504739*^9}, {3.520008634227459*^9,
3.5200086454774747`*^9}, {3.520008679107522*^9, 3.520008707787562*^9}, {
3.520009022878003*^9, 3.5200090267780085`*^9}, {3.520009114588132*^9,
3.520009115638133*^9}, {3.52000917751822*^9, 3.52000917788822*^9}, {
3.520009232388296*^9, 3.520009233728298*^9}, {3.5200096803289237`*^9,
3.5200096817989254`*^9}, {3.5200097702990494`*^9, 3.520009789299076*^9}, {
3.5200099246992655`*^9, 3.5200099606693163`*^9}, {3.520010018479397*^9,
3.5200100198093987`*^9}, {3.5200101574795914`*^9,
3.5200101701596093`*^9}, {3.523219291537746*^9, 3.523219307977769*^9}, {
3.5232194303579407`*^9, 3.5232194305479407`*^9}, 3.523924040949127*^9, {
3.523924083896003*^9, 3.523924086610408*^9}, 3.523924210381025*^9,
3.5239244595882626`*^9, {3.523925083277358*^9, 3.5239251500298758`*^9},
3.5240762505213795`*^9, 3.524078560386237*^9, {3.524079201235362*^9,
3.5240792160553885`*^9}, {3.5240792615450683`*^9, 3.524079263245471*^9}, {
3.52407931407036*^9, 3.524079315333963*^9}, {3.5240794632378225`*^9,
3.5240794666386285`*^9}, {3.5241038915762796`*^9, 3.524103955302392*^9}, {
3.5241092335840626`*^9, 3.524109236189267*^9}, {3.5241093841867275`*^9,
3.5241094179919863`*^9}, {3.5241094771004906`*^9, 3.524109478598093*^9}, {
3.5241592101752768`*^9, 3.524159214705283*^9}, {3.5241592921253915`*^9,
3.524159300245403*^9}, {3.5241593621054897`*^9, 3.5241593685654984`*^9}, {
3.5241596320758677`*^9, 3.5241596554659004`*^9}, {3.5241597920960913`*^9,
3.5241597944060946`*^9}, {3.524171076647507*^9, 3.5241710855075197`*^9}, {
3.5241902075571866`*^9, 3.5241902127207956`*^9}, {3.524190359891454*^9,
3.524190365991065*^9}, {3.524192455007534*^9, 3.524192459921543*^9}, {
3.5241924983444104`*^9, 3.5241925008092146`*^9}, {3.524192578996552*^9,
3.524192580728155*^9}, {3.524192647355872*^9, 3.5241926520514803`*^9}, {
3.5241926899907465`*^9, 3.5241927010667667`*^9}, {3.524192750394053*^9,
3.5241927779437017`*^9}, {3.5241928342598004`*^9,
3.5241928356014028`*^9}, {3.524192886363892*^9, 3.5241929290923667`*^9}, {
3.5241930126929135`*^9, 3.5241930342209516`*^9}, 3.524253083175646*^9,
3.5242575379690695`*^9, 3.524258633652594*^9, 3.5249480915983686`*^9, {
3.5332484110692635`*^9, 3.5332484132492666`*^9}, {3.5422492398098097`*^9,
3.5422492472312346`*^9}, {3.559761092622876*^9, 3.559761119849434*^9}, {
3.559761766197403*^9, 3.5597617662104034`*^9}, {3.559762849900387*^9,
3.559762861701062*^9}, {3.559766435227456*^9, 3.5597664702564597`*^9}, {
3.559766573360357*^9, 3.5597665848500137`*^9}, 3.559772204563448*^9,
3.5597726348900614`*^9, {3.5597879119951415`*^9, 3.5597879831132097`*^9}, {
3.559866186860685*^9, 3.5598661877727365`*^9}, {3.559866244969899*^9,
3.559866277590762*^9}, 3.7061417753185077`*^9, 3.7154755958041134`*^9,
3.7154756779228106`*^9},
Background->GrayLevel[0.85]],
Cell["", "Subsubsection",
CellDingbat->None,
CellChangeTimes->{3.4796643211106243`*^9}]
}, Closed]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"\t\t\t",
RowBox[{Cell[TextData[StyleBox["2:",
FontFamily->"Arial",
FontColor->RGBColor[1, 0, 0]]], "None"], " ",
RowBox[{"\[Integral]",
RowBox[{
FractionBox[
SuperscriptBox["v", "n"], "u"],
RowBox[{"\[DifferentialD]", "x"}], " ",
StyleBox["when",
FontFamily->"Arial",
FontWeight->"Plain"],
StyleBox[" ",
FontFamily->"Arial",
FontWeight->"Plain"], Cell[TextData[Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
SubscriptBox["\[PartialD]", "x"], "u"}], "\[Equal]", "a"}], " ",
"\[And]", " ",
RowBox[{
RowBox[{
SubscriptBox["\[PartialD]", "x"], "v"}], "\[Equal]", "b"}], " ",
"\[And]", " ",
RowBox[{
RowBox[{
RowBox[{"b", " ", "u"}], "-",
RowBox[{"a", " ", "v"}]}], "\[NotEqual]", "0"}], " ", "\[And]", " ",
RowBox[{"n", ">", "0"}], " ", "\[And]", " ",
RowBox[{"n", "\[NotEqual]", "1"}]}]]]], "None"]}]}]}]}]], "Subsubtitle",
CellDingbat->None,
CellChangeTimes->{
3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9,
3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9,
3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9},
3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9},
3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9,
3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9,
3.496441349830719*^9}, 3.4964414848609076`*^9, 3.4964645213514385`*^9,
3.5192470594155855`*^9, {3.519247288125906*^9, 3.5192473207459517`*^9}, {
3.519247363296011*^9, 3.519247363796012*^9}, 3.519258420199427*^9,
3.5192584863895197`*^9, {3.519320760160028*^9, 3.519320767367241*^9},
3.5193299099191504`*^9, {3.5193300315093203`*^9, 3.519330031709321*^9}, {
3.5193323099968634`*^9, 3.5193324414114943`*^9}, {3.5193327317904043`*^9,
3.519332762148057*^9}, {3.519340455685931*^9, 3.519340463318947*^9},
3.519340635545749*^9, {3.5193422478304834`*^9, 3.519342248704085*^9}, {
3.519342492766513*^9, 3.519342493156514*^9}, {3.519345750301442*^9,
3.5193457505978427`*^9}, 3.519346263464343*^9, {3.519349307658399*^9,
3.519349310965605*^9}, {3.519352294781488*^9, 3.5193522950014887`*^9}, {
3.5194134359455075`*^9, 3.519413446054325*^9}, {3.5194134908888044`*^9,
3.5194134927764077`*^9}, {3.5194141847624226`*^9,
3.5194142323581066`*^9}, {3.519414342899901*^9, 3.519414474720132*^9}, {
3.5197939535480833`*^9, 3.5197939539380836`*^9}, {3.5197940297698174`*^9,
3.5197940299726176`*^9}, 3.519795153580191*^9, {3.5200103027397947`*^9,
3.5200103044997973`*^9}, {3.5232186878169007`*^9,
3.5232186881569014`*^9}, {3.5232193955778913`*^9,
3.5232193955778913`*^9}, {3.5233166487845354`*^9,
3.5233166487845354`*^9}, {3.5233167010346084`*^9,
3.5233167010346084`*^9}, {3.523318546315711*^9, 3.523318573368556*^9}, {
3.5239220709492664`*^9, 3.5239220924617043`*^9}, {3.5239221279205666`*^9,
3.5239221365629816`*^9}, {3.523930270899587*^9, 3.523930270899587*^9}, {
3.5240761703528385`*^9, 3.5240761703528385`*^9}, {3.52407843124921*^9,
3.5240784332304134`*^9}, {3.5240784932749186`*^9,
3.5240784932749186`*^9}, {3.524079230095413*^9, 3.524079246553442*^9}, {
3.5242761432469025`*^9, 3.524276143496503*^9}, {3.5242771518198743`*^9,
3.5242771521630745`*^9}, {3.53050021879398*^9, 3.5305002190639806`*^9}, {
3.5313467792889757`*^9, 3.531346779609437*^9}, {3.5332483759292145`*^9,
3.533248378049217*^9}, {3.5361011340389395`*^9, 3.5361011342609525`*^9}, {
3.5393936513939505`*^9, 3.539393651589962*^9}, {3.5597602987184677`*^9,
3.559760311575203*^9}, {3.5597622924045*^9, 3.5597622924055*^9}, {
3.5597663431011868`*^9, 3.5597663435022097`*^9}, {3.5597855003192015`*^9,
3.5597855007092237`*^9}, {3.55978775164997*^9, 3.559787835942792*^9}, {
3.559861161100974*^9, 3.559861162038028*^9}, {3.5598662173573985`*^9,
3.5598662221506724`*^9}},
FontSize->12,
FontWeight->"Bold"],
Cell[TextData[{
"Derivation: Piecewise linear recurrence 2 with ",
Cell[BoxData[
RowBox[{"m", "=",
RowBox[{"-", "1"}]}]]]
}], "Subsubsection",
CellChangeTimes->{
3.496441803031353*^9, 3.4965396318089237`*^9, {3.4966002562016735`*^9,
3.4966002624716825`*^9}, 3.496600707442305*^9, 3.4966008475725017`*^9, {
3.4966070255131593`*^9, 3.496607032413169*^9}, 3.518279406700592*^9, {
3.51840552316576*^9, 3.5184055392257824`*^9}, 3.5184748983401833`*^9, {
3.5239219320466223`*^9, 3.523921932483423*^9}, 3.523922332636526*^9,
3.5240774276838474`*^9, 3.559762733210713*^9, {3.559787814676575*^9,
3.5597878234010744`*^9}}],
Cell["Derivation: Inverted integration by parts", "Subsubsection",
CellChangeTimes->{
3.4964418130913677`*^9, {3.496442428087432*^9, 3.4964424330170403`*^9},
3.4964493315022907`*^9, 3.496451849815816*^9, 3.4964519519959593`*^9}],
Cell[TextData[{
"Rule: If ",
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
SubscriptBox["\[PartialD]", "x"], "u"}], "\[Equal]", "a"}], " ",
"\[And]", " ",
RowBox[{
RowBox[{
SubscriptBox["\[PartialD]", "x"], "v"}], "\[Equal]", "b"}], " ",
"\[And]", " ",
RowBox[{
RowBox[{
RowBox[{"b", " ", "u"}], "-",
RowBox[{"a", " ", "v"}]}], "\[NotEqual]", "0"}], " ", "\[And]", " ",
RowBox[{"n", ">", "0"}], " ", "\[And]", " ",
RowBox[{"n", "\[NotEqual]", "1"}]}]]],
", then"
}], "Subsubsection",
CellDingbat->"\[FilledSmallSquare]",
CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9,
3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9,
3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9,
3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9,
3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9},
3.48070534977779*^9, {3.4928296953212276`*^9, 3.492829707041244*^9}, {
3.495391733731629*^9, 3.495391739521637*^9}, {3.4957339078770905`*^9,
3.495733966267172*^9}, {3.495734148157427*^9, 3.4957341584974413`*^9}, {
3.4957346698781567`*^9, 3.495734670108157*^9}, {3.4957347778783083`*^9,
3.4957348688784356`*^9}, {3.4957353058790474`*^9,
3.4957353764991465`*^9}, {3.495735447019245*^9, 3.4957354738692827`*^9}, {